--- Incompatibility of function 'words' with Haskell
--- see 'https://github.com/Frege/frege/issues/301 issue 301'
module tests.comp.Issue301 where

main = do
        println ("Expected:  " ++ show expected)
        println ("Got:       " ++ show result)
        println ("Apparently, the words function is "
                    ++ (if result == expected then "fully" else "not")
                    ++ " compatible with Haskell2010.") 
    where
        result   = words " one two three"
        expected = ["one", "two", "three"]
